home *** CD-ROM | disk | FTP | other *** search
- object dlgEditText: TdlgEditText
- Left = 676
- Top = 335
- BorderIcons = [biSystemMenu]
- BorderStyle = bsDialog
- Caption = 'Text Properties'
- ClientHeight = 281
- ClientWidth = 427
- Color = clBtnFace
- ParentFont = True
- OldCreateOrder = True
- Position = poScreenCenter
- ShowHint = True
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- PixelsPerInch = 96
- TextHeight = 13
- object Bevel1: TBevel
- Left = 8
- Top = 8
- Width = 409
- Height = 230
- Shape = bsFrame
- end
- object Label1: TLabel
- Left = 28
- Top = 26
- Width = 24
- Height = 13
- Caption = 'Text:'
- end
- object Label2: TLabel
- Left = 220
- Top = 89
- Width = 27
- Height = 13
- Caption = 'Color:'
- end
- object Label3: TLabel
- Left = 28
- Top = 90
- Width = 24
- Height = 13
- Caption = 'Font:'
- end
- object Label4: TLabel
- Left = 28
- Top = 122
- Width = 37
- Height = 13
- AutoSize = False
- Caption = 'Size:'
- end
- object Label5: TLabel
- Left = 173
- Top = 122
- Width = 43
- Height = 13
- Alignment = taRightJustify
- AutoSize = False
- Caption = 'Style:'
- end
- object Label6: TLabel
- Left = 28
- Top = 185
- Width = 133
- Height = 13
- AutoSize = False
- Caption = 'Text Background Color:'
- end
- object Label7: TLabel
- Left = 20
- Top = 64
- Width = 62
- Height = 13
- Caption = 'Font Style:'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label8: TLabel
- Left = 20
- Top = 160
- Width = 48
- Height = 13
- Caption = 'Options:'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object edtText: TEdit
- Left = 68
- Top = 22
- Width = 333
- Height = 21
- Hint = 'The text to add'
- TabOrder = 0
- OnChange = edtTextChange
- end
- object cmbFonts: TExFontComboBox
- Left = 68
- Top = 85
- Width = 141
- Height = 22
- Hint = 'The font of the text'
- DropDownCount = 16
- TabOrder = 1
- OnChange = cmbFontsChange
- TTonly = False
- UseItemFont = True
- end
- object chkboxBold: TCheckBox
- Left = 232
- Top = 121
- Width = 49
- Height = 16
- Hint = 'Set the text as bold'
- Caption = 'Bold'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 4
- OnClick = chkboxBoldClick
- end
- object chkboxItalic: TCheckBox
- Left = 284
- Top = 121
- Width = 49
- Height = 17
- Hint = 'Set the text as italicized'
- Caption = 'Italic'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 5
- OnClick = chkboxItalicClick
- end
- object sedtFontSize: TSpinEdit
- Left = 68
- Top = 117
- Width = 61
- Height = 22
- Hint = 'The size of the font'
- MaxValue = 0
- MinValue = 0
- TabOrder = 2
- Value = 0
- OnChange = sedtFontSizeChange
- end
- object btnOK: TsitBitBtn
- Left = 244
- Top = 245
- Width = 84
- Height = 25
- Caption = 'OK'
- Default = True
- ModalResult = 1
- TabOrder = 9
- OnClick = btnOKClick
- Images = frmMain.ImageList1
- ImageIndex = 0
- end
- object btnCancel: TsitBitBtn
- Left = 332
- Top = 245
- Width = 84
- Height = 25
- Cancel = True
- Caption = 'Cancel'
- ModalResult = 2
- TabOrder = 10
- OnClick = btnCancelClick
- Images = frmMain.ImageList1
- ImageIndex = 1
- end
- object cmbColor: TColorComboBox
- Left = 260
- Top = 84
- Width = 141
- Height = 22
- Hint = 'The color of the text'
- HTMLcolor = '#000000'
- ColorValue = clBlack
- TabOrder = 3
- OnChange = cmbColorChange
- end
- object cmbBGColor: TColorComboBox_Trans
- Left = 152
- Top = 180
- Width = 153
- Height = 22
- Hint = 'The color displayed behind the text'
- HTMLcolor = '#000000'
- ColorValue = clNone
- TabOrder = 7
- OnChange = cmbBGColorChange
- end
- object chkUnderline: TCheckBox
- Left = 336
- Top = 121
- Width = 73
- Height = 17
- Caption = 'Underline'
- TabOrder = 6
- OnClick = chkUnderlineClick
- end
- object chkCenterLocked: TCheckBox
- Left = 28
- Top = 209
- Width = 285
- Height = 17
- Hint =
- 'Specifies that the text will always be horizontally centered wit' +
- 'hin the displayed page'
- Caption = 'Lock the text position to the center of the page'
- TabOrder = 8
- OnClick = chkCenterLockedClick
- end
- end
-